function [discount,beca,stipend] = u13_2012(math,lang,demrecode)
%% Universidad de Concepcion
lm=(math+lang)/2;
discount=zeros(size(lm,1),1);
beca=zeros(size(lm,1),1);
stipend=zeros(size(lm,1),1);

%NOTHING (actually, this one has quite a few, but none works for us)

%BVP
if demrecode==13038 || demrecode==13039 || demrecode==13041 || demrecode==13037 || demrecode==13079 || demrecode==13035 || demrecode==13036 || demrecode==13032 || demrecode==13092 || demrecode==13089 || demrecode==13028 || demrecode==13101 || demrecode==13090 || demrecode==13027 || demrecode==13042 || demrecode==13040 || demrecode==13057 || demrecode==13098 || demrecode==13045
    [discount,stipend]=bvp(lm);
end

end
